(thai-composition-function): Fix arguments.

diff --git a/lisp/language/thai-util.el b/lisp/language/thai-util.el
index 5302a8d5a60c43df6ae88a039f77c59b9da74dbd..0c09b79afd408535772ceaca18b0550cdba11603 100644 (file)
--- a/lisp/language/thai-util.el
+++ b/lisp/language/thai-util.el
@@ -229,7 +229,7 @@ positions (integers or markers) specifying the region."
   (thai-compose-region (point-min) (point-max)))
 
 ;;;###autoload
-(defun thai-composition-function (pos &optional string)
+(defun thai-composition-function (pos to font-object string)
   (setq pos (1- pos))
   (with-category-table thai-category-table
     (if string